home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / A-B / Bible.cpt / Hyper Sword / card_31977.txt < prev    next >
Text File  |  1989-07-04  |  2KB  |  117 lines
  1. -- card: 31977 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2636
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0005
  11. -- rect: left=20 top=132 right=155 bottom=42
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: New Button
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   set the cursor to 4
  23.   global duplicate
  24.   global scoring
  25.   add 1 to scoring
  26.   put"" into background field id"21"
  27.   get loc of background field id"21"
  28.   choose browse tool
  29.   Play"Applause"
  30.   click at it
  31.   type"Correct - Keep up the Good Work."
  32.   add 1 to duplicate
  33. end mouseUp
  34.  
  35.  
  36.  
  37. -- part 2 (button)
  38. -- low flags: 00
  39. -- high flags: 0005
  40. -- rect: left=20 top=109 right=132 bottom=42
  41. -- title width / last selected line: 0
  42. -- icon id / first selected line: 0 / 0
  43. -- text alignment: 1
  44. -- font id: 0
  45. -- text size: 12
  46. -- style flags: 0
  47. -- line height: 16
  48. -- part name: New Button
  49. ----- HyperTalk script -----
  50. on mouseUp
  51.   set the cursor to 4
  52.   global duplicate
  53.   put"" into background field id"21"
  54.   get loc of background field id"21"
  55.   choose browse tool
  56.   click at it
  57.   play"boing"
  58.   type"Sorry your answer is incorrect"
  59.   add 1 to duplicate
  60. end mouseUp
  61.  
  62.  
  63.  
  64. -- part 3 (button)
  65. -- low flags: 00
  66. -- high flags: 0005
  67. -- rect: left=20 top=155 right=178 bottom=42
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 1
  71. -- font id: 0
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: New Button
  76. ----- HyperTalk script -----
  77. on mouseUp
  78.   set the cursor to 4
  79.   global duplicate
  80.   put"" into background field id"21"
  81.   get loc of background field id"21"
  82.   choose browse tool
  83.   click at it
  84.   play"boing"
  85.   type"Sorry your answer is incorrect"
  86.   add 1 to duplicate
  87. end mouseUp
  88.  
  89.  
  90.  
  91. -- part contents for background part 37
  92. ----- text -----
  93. 19000
  94.  
  95. -- part contents for background part 32
  96. ----- text -----
  97. Doctrine Of Man
  98.  
  99. -- part contents for background part 1
  100. ----- text -----
  101. What question does Psalm 8: 3, 4 ask?
  102.  
  103. -- part contents for background part 12
  104. ----- text -----
  105. "If a man die shall he live again?"
  106.  
  107. -- part contents for background part 13
  108. ----- text -----
  109. "What is man, that thou art mindful of him?"
  110.  
  111. -- part contents for background part 14
  112. ----- text -----
  113. "Wherewithal shall a young man cleanse his way?"
  114.  
  115. -- part contents for background part 43
  116. ----- text -----
  117. Psalm 8: 3, 4